<?php
//$name="SINAVE_";
$arrSec = array("","ISSSTE","IMSS","SSA");
//$arrEnt = arrat("",)
import_request_variables("gP");
include('../Lib/php/conex.php');
include('../Lib/php/funciones.php');
include('fechas.php');
	$link= conectaSQL("influenza","inf123456","influenza");
	
//print_r($_GET);
$name="SINAVE_";

if($perfil == 1){

$name .=  str_replace(" ","_",str_replace( ".", "",$nombreUnidad));
}

if($perfil == 3){
	$nombreEntidad = catalogoMssql($identidad, "catalogos.dbo.entidad", "nombre", "entidad",$link);
    $sql= "select nombre from  catalogos.dbo.entidad where entidad = $identidad  ";
// 	$rs = mssql_query($sql,$link) or die ("No se pudo consultar la informacion<br>$sql");
//	$arr=mssql_fetch_array($rs);
//	$name .= $arrSec[$idsector]."_";
	$name .= str_replace(" ","_",str_replace( ".", "",$nombreEntidad))."_";

}

if($perfil == 5){
	$nombreEntidad = catalogoMssql ($entidad, "catalogos.dbo.entidad", "nombre", "entidad",$link);
	//$sql= "select nombre from  catalogos.dbo.entidad where entidad = $entidad  ";
 	//$rs = mssql_query($sql,$link) or die ("No se pudo consultar la infromacion<br>$sql");
	//$arr=mssql_fetch_array($rs);
	
	if($sector > 0 ){$name .= $arrSec[$sector]."_";}
	if($entidad > 0) {$name .= str_replace(" ","_",str_replace( ".", "",$nombreEntidad))."_"; }
}

$name .= date('d-m-Y');

//echo "<br>$perfil<br>$name";

 
 
 
	
//session_start();

header("Content-type: application/vnd.ms-excel");
header("Content-Disposition: attachment; filename=$name.xls");
header("Pragma: no-cache");
header("Expires: 0");

$sql="select distinct 
CASE r.id_sector WHEN 1 THEN 'ISSSTE' WHEN 2 THEN 'IMSS' WHEN 3 THEN 'SSA' END AS 'SECTOR'
,x.cEntidad as 'ENTIDAD'
,x.cDelegacion As 'DELEGACION'
,cUnidad as 'UNIDAD'
,convert(varchar,g.fcreacion,111) as 'FECHA DE REGISTRO'
,x.clues as 'CLUES'
,r.cFolio as 'FOLIO SINAVE'
,g.cPaterno AS 'APELLIDO PATERNO'
,g.cMaterno AS 'APELLIDO MATERNO'
,g.cNombre AS 'NOMBRE (S)'
,case g.nSexo when 1 then 'MASCULINO' ELSE 'FEMENINO' END AS 'SEXO'
,g.curp AS 'CURP'
,eN.nombre AS 'ENTIDAD NACIMIENTO'
,eR.nombre AS 'ENTIDAD DE RESIDENCIA'
,mun.id_entidad as 'CVE ENTIDAD INEGI'
,mun.cNmunicipio AS 'MUNICIPIO RESIDENCIA'
,mun.id_municipio as 'CVE MUNICIPIO INEGI'
,loc.localidad AS 'LOCALIDAD DE RESIDENCIA'
,loc.cve_loc AS 'CVE LOCALIDAD INEGI'";

if($perfil != 1){

$sql .="
,loc.latitud as 'LATITUD LOCALIDAD'
,loc.longitud as 'LONGITUD LOCALIDAD'";
}

$sql .="


,case nTipopaciente when 1 then 'HOSPITALIZADO' WHEN 2 THEN 'AMBULATORIO' END AS 'TIPO PACIENTE'
,ce.evolucion + case  when r.nevolucion in(1,2) then (' - ' + cs.descripcion) end  as 'EVOLUCION'
,case r.nintubacion when 1 then 'SI' WHEN 2 THEN 'NO' END AS 'INTUBADO'
,CASE r.nDclinico when 1 then 'SI' WHEN 2 THEN 'NO' END AS 'DIAGNOSTICO CLINICO DE NEUMONIA'
";

if($dat_gen == "true"){
$sql .="
,g.nDias +'/'+g.nMeses+'/'+ cast(g.nAnio as varchar) AS 'FECHA DE NACIMIENTO'
,case g.nNacionalidad when 1 then 'MEXICANA' else 'EXTRANJERA' end AS 'NACIONALIDAD'
,CASE g.nEmbarazada when 1 then 'SI' when 2 then 'NO' when 3 then 'SE IGNORA' else '' end AS  'ESTA EMBARAZADA'
,g.nMesesE 'MESES DE EMBARAZO'
,g.calle+' Num. '+g.cCalle_numero+' entre '+g.calle1+ ' y '+g.calle2+' COLONIA: '+g.cColonia+' C.p.'+g.cp AS 'DOMICILIO'
,g.telefono AS 'TELEFONO'
,CASE g.nIndigena when 1 then 'SI' when 2 then 'NO' else '' end AS 'ES INDIGENA'
,CASE g.nLenguaIndigena when 1 then 'SI' when 2 then 'NO' else '' end AS 'HABLA LENGUA INDIGENA'
,ocu.ocupacion AS 'OCUPACION'
 ";}

if($dat_cli == "true"){
$sql .=",ser.servicio as 'SERVICIO_INGRESO'
,convert(varchar, r.fIngreso, 111) AS 'FECHA DE INGRESO'
,convert(varchar, r.fSintoma_Inicial, 111) AS 'FECHA DE INCIO SINTOMAS'
, case r.nDiagnostico when 16 then 'ENFERMEDAD TIPO INFLUENZA (ETI)' when 17 then 'INFECCION RESPIRATORIA AGUDA GRAVE (IRAG)' end as 'DIAGNOSTICO PROBABLE'
";}
if($dat_sin == "true"){
$sql .=", case w.FIEBRE when 1 then 'SI' when 2 then 'NO' else 'SE IGNORA' END as 'FIEBRE'
, case w.TOS when 1 then 'SI' when 2 then 'NO' else 'SE IGNORA' END as 'TOS'
, case w.ODINOFAGIA when 1 then 'SI' when 2 then 'NO' else 'SE IGNORA' END as 'ODINOFAGIA'
, case w.DISNEA when 1 then 'SI' when 2 then 'NO' else 'SE IGNORA' END as 'DISNEA'
, case w.IRRITABILIDAD when 1 then 'SI' when 2 then 'NO' else 'SE IGNORA' END as 'IRRITABILIDAD'
, case w.DIARREA when 1 then 'SI' when 2 then 'NO' else 'SE IGNORA' END as 'DIARREA'
, case w.DOLOR_TORACICO when 1 then 'SI' when 2 then 'NO' else 'SE IGNORA' END as 'DOLOR TORACICO'
, case w.ESCALOFRIOS when 1 then 'SI' when 2 then 'NO' else 'SE IGNORA' END as 'ESCALOFRIOS'
, case w.CEFALEA when 1 then 'SI' when 2 then 'NO' else 'SE IGNORA' END as 'CEFALEA'
, case w.MIALGIAS when 1 then 'SI' when 2 then 'NO' else 'SE IGNORA' END as 'MIALGIAS'
, case w.ARTRALGIAS when 1 then 'SI' when 2 then 'NO' else 'SE IGNORA' END as 'ARTRALGIAS'
, case w.AEG when 1 then 'SI' when 2 then 'NO' else 'SE IGNORA' END as 'ATAQUE AL ESTADO GENERAL'
, case w.RINORREA when 1 then 'SI' when 2 then 'NO' else 'SE IGNORA' END as 'RINORREA'
, case w.POLIPNEA when 1 then 'SI' when 2 then 'NO' else 'SE IGNORA' END as 'POLIPNEA'
, case w.VOMITO when 1 then 'SI' when 2 then 'NO' else 'SE IGNORA' END as 'VOMITO'
, case w.DOLOR_ABDOMINAL when 1 then 'SI' when 2 then 'NO' else 'SE IGNORA' END as 'DOLOR ABDOMINAL'
, case w.CONJUNTIVITIS when 1 then 'SI' when 2 then 'NO' else 'SE IGNORA' END as 'CONJUNTIVITIS'
, case w.CIANOSIS when 1 then 'SI' when 2 then 'NO' else 'SE IGNORA' END as 'CIANOSIS'
, case w.SUBITO when 1 then 'SI' when 2 then 'NO' else 'SE IGNORA' END as 'INICIO SUBITO DE LOS SINTOMAS'";}

if($dat_com == "true"){
$sql .=", case v.DIABETES when 1 then 'SI' when 2 then 'NO' else 'SE IGNORA' END as 'DIABETES'
, case v.EPOC when 1 then 'SI' when 2 then 'NO' else 'SE IGNORA' END as 'EPOC'
, case v.ASMA when 1 then 'SI' when 2 then 'NO' else 'SE IGNORA' END as 'ASMA'
, case v.INMUNOSUPRESION when 1 then 'SI' when 2 then 'NO' else 'SE IGNORA' END as 'INMUNOSUPRESION'
, case v.HIPERTENSION when 1 then 'SI' when 2 then 'NO' else 'SE IGNORA' END as 'HIPERTENSION'
, case v.VIH_SIDA when 1 then 'SI' when 2 then 'NO' else 'SE IGNORA' END as 'VIH/SIDA'
, case v.OTRA_CONDICION when 1 then 'SI' when 2 then 'NO' else 'SE IGNORA' END as 'OTRA CONDICION'
, case v.ENF_CARDIOVASCULAR when 1 then 'SI' when 2 then 'NO' else 'SE IGNORA' END as 'ENF. CARDIOVASCULAR'
, case v.OBESIDAD when 1 then 'SI' when 2 then 'NO' else 'SE IGNORA' END as 'OBESIDAD'
, case v.IRC when 1 then 'SI' when 2 then 'NO' else 'SE IGNORA' END as 'INSUFICIENCIA RENAL CRONICA'
, case v.TABAQUISMO when 1 then 'SI' when 2 then 'NO' else 'SE IGNORA' END as 'TABAQUISMO'";}

if($dat_tra == "true"){
$sql .=", CASE r.nRecibioTratamiento when 1 then 'SI' when 2 then 'NO'end as 'RECIBIO TRATAMIENTO'
, CASE r.NTratamiento_Antimicrobianos when 1 then 'SI' when 2 then 'NO'end as 'TRATAMIENTO CON ANTIMICROBIANOS'
, CASE r.NTratamiento_Antiviral when 1 then 'SI' when 2 then 'NO'end as 'TRATAMIENTO ANTIVIRAL'
, case r.nAntiviral when 1 then 'AMANTADINA' WHEN 2 THEN 'RIMNTADINA' WHEN 3 THEN 'OSELTAMIVIR' WHEN 4 THEN 'ZAVAMIVIR' WHEN 5 THEN r.cOtros_Antiviral end as 'ANTIVIRAL'"; }

if($dat_epi == "true"){
$sql .=", CASE r.nContactoOtros when 1 then 'SI' when 2 then 'NO'end as 'CONTACTO OTROS CASOS'
, CASE r.nContactoAves when 1 then 'SI' when 2 then 'NO'end as 'CONTACTO AVES'
, CASE r.nContactoCerdos when 1 then 'SI' when 2 then 'NO'end as 'CONTACTO CERDOS'
,  r.cContactoAnimales  as 'CONTACTO ANIMALES'
, CASE r.nVacunado when 1 then 'SI' when 2 then 'NO' when 3 then 'SE IGNORA' end as 'VACUNADO'
, convert(varchar, r.fVACUNA_estacional, 111) AS 'FECHA DE VACUNA'";}

if($dat_lab == "true"){
$sql .=", CASE r.nTomaMuestra when 1 then 'SI' when 2 then 'NO'end as 'TOMA MUESTRA'
, clab.claboratorio
, case lab.ntipomuestra when 1 then 'EXUDADO FARINGEO' when 2 then 'EXUDADO NASOFARINGEO' when 3 then 'LAVADO BRONQUIAL' when 4 then 'BIOPSA PULMONAR (post-mortem)' end as 'PROCEDIMIENTO' 
,rr.resultados as 'RESULTADO MUESTRA'"; }

$sql .="from influenza.dbo.dat_generales g
left join catalogos.dbo.entidad eN on eN.entidad = g.nEntidad_Nacimiento
left join catalogos.dbo.entidad eR on eR.entidad = g.nEntidad

left join catalogos.dbo.municipios_inegi mun on mun.id_principal = g.nMunicipio
left join catalogos.dbo.cat_localidades loc on loc.id_localidad = g.nLocalidad
left join influenza.dbo.cat_ocupacion ocu on ocu.id_ocupacion = g.nOcupacion
left join influenza.dbo.dat_registro r on r.id_generales = g.id_principal
left join catalogos.dbo.vw_unidades_flu x on x.id_unidad =  r.id_unidad
left join influenza.dbo.cat_servicios ser on ser.id_servicio = r.id_servicio
left join influenza.dbo.vw_sintomas_pac w on w.id_registro = r.id_principal
left join influenza.dbo.vw_comorb_pac v on v.id_registro = r.id_principal
left join influenza.dbo.dat_laboratorio lab on lab.id_registro = r.id_principal
left join influenza.dbo.cat_laboratorio  clab on clab.id_laboratorio = lab.id_laboratorio
left join influenza.dbo.cat_lab_resultados rr on r.nLabResultado = rr.id_resultados
left join influenza.dbo.cat_evolucion ce on ce.id_evolucion = r.nevolucion
LEFT JOIN influenza.dbo.cat_subevolucion cs on cs.id_principal = r.nsubevolucion
 where r.nStatus = 1  
";
//PARA FILTROS POR TIPO USUARIO
if($perfil == 1)
	{
		$sql .= " and r.id_unidad = ". $idunidad;
	}

if($perfil == 3)
	{
		$sql .= " and x.entidad =". $identidad  ;
	}

if($sector > 0 )
	{
		$sql .= " and r.id_sector = $sector ";
	}


if($entidad > 0 )
	{
		$sql .= " and x.entidad = $entidad ";
	}

if (strlen($fInicial) == 10){$sql .= " and r.fSintoma_Inicial >= '".substr($fInicial,6,4).substr($fInicial,3,2).substr($fInicial,0,2)."'"; }
if (strlen($fFinal) == 10){$sql .= " and r.fSintoma_Inicial <= '".substr($fFinal,6,4).substr($fFinal,3,2).substr($fFinal,0,2)."'"; }

//echo $sql;
//die($sql);
//exit();

$rs=mssql_query($sql,$link) or die ("No se pudo consultar la informacion<br>".$sql."<br>".mssql_get_last_message());
$num = mssql_num_fields($rs);
//echo $num;
echo "<table border=1><tr>\n";
    	for ($x=0;$x<$num;$x++){ 
		$xcampo = mssql_field_name($rs, $x);
		echo "<td><b>$xcampo</b></td>\n";
 }
 
 while($arr=mssql_fetch_array($rs)){
 		echo "<tr>\n";
 		for ($x=0;$x<$num;$x++){ 
		$cadena = limpia_usuario2($arr[$x]);
		echo "<td>".$cadena."</td>\n";
		}
		echo"</tr>\n";
		 
 }
echo "</table>"; 


?>
